السلام عليكم ورحمة الله وبركاته , في هدا الدرس سوف أشرح لكم كيفية إنشاء برنامج صغير و ذالك عن طريق بعض الاكواد البرمجية لا تقلق لا نتحتاح سوى المفكرة للقيام بهده العملية , بعدها سوف يكون أمامك برنامج يقوم بتحويل أي شيئ تكتبه إلى صوت لمعرفة كيفية ذالك تابع الشرح بالفيديو .
.png)
الكود المستعمل :
Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
.png)
الشرح بالفيديو :
الكود المستعمل :
Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
.png)
.png "تسريع الرام")
.png "تسريع الرام")
+(1).png)
.png)
